module dec_to_bcd (bin_data, bcd_data);

  input [15:0] bin_data;

  output reg [19:0] bcd_data;

  always @ (*)
    begin
      bcd_data[3:0] = bin_data % 10;
      bcd_data[7:4] = (bin_data / 10 ) % 10;
      bcd_data[11:8] = (bin_data / 100) % 10;
      bcd_data[15:12] = (bin_data / 1000) % 10;
    end

endmodule